home *** CD-ROM | disk | FTP | other *** search
/ EuroCD 3 / EuroCD 3.iso / Programming / SecalDemo / Inc / libcalls / asl.inc < prev    next >
Text File  |  1998-06-24  |  847b  |  42 lines
  1. pattern AllocFileRequest is
  2.     push a6;
  3.     a6:=AslBase; jsr [a6-30];
  4.     pop a6;
  5. endp;                                                            # ALLOCFILEREQUEST
  6.  
  7. pattern FreeFileRequest(_fileReq) is
  8.     push a6;
  9.     a0:=_fileReq;
  10.     a6:=AslBase; jsr [a6-36];
  11.     pop a6;
  12. endp;                                                            # FREEFILEREQUEST
  13.  
  14. pattern RequestFile(_fileReq) is
  15.     push a6;
  16.     a0:=_fileReq;
  17.     a6:=AslBase; jsr [a6-42];
  18.     pop a6;
  19. endp;                                                            # REQUESTFILE
  20.  
  21. pattern AllocAslRequest(_reqType,_tagList) is
  22.     push a6;
  23.     safe d0.l:=_reqType; a0:=_tagList;;
  24.     a6:=AslBase; jsr [a6-48];
  25.     pop a6;
  26. endp;                                                            # ALLOCASLREQUEST
  27.  
  28. pattern FreeAslRequest(_requester) is
  29.     push a6;
  30.     a0:=_requester;
  31.     a6:=AslBase; jsr [a6-54];
  32.     pop a6;
  33. endp;                                                            # FREEASLREQUEST
  34.  
  35. pattern AslRequest(_requester,_tagList) is
  36.     push a6;
  37.     safe a0:=_requester; a1:=_tagList;;
  38.     a6:=AslBase; jsr [a6-60];
  39.     pop a6;
  40. endp;                                                            # ASLREQUEST
  41.  
  42.